(auto-insert): Use `mapc' rather than `mapcar'.

diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 91bfb396b0e4616052854769e7cf2c517b83cc1a..f2ae7a5b4fd2f077c4f2c40524bc77890dc83d4d 100644 (file)
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -272,7 +272,7 @@ Matches the visited file name against the elements of `auto-insert-alist'."
                          (eq this-command 'auto-insert))
                      (y-or-n-p (format auto-insert-prompt desc)))
                t)
-             (mapcar
+             (mapc
               (lambda (action)
                 (if (stringp action)
                     (if (file-readable-p